﻿Public Class frmAyuda

    Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Close()
    End Sub

    Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click
        MsgBox("Para utilizar la ayuda simplemente seleccione alguna de las siguientes preguntas segun su necesidad", MsgBoxStyle.Information, "Ayuda")
    End Sub

    Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
        Label1.Visible = True
        Label1.Text = "Para poder registrar información en el sistema usted debe introducir todos los datos segun el formato que se le especifica en cada campo"
    End Sub

    Private Sub frmAyuda_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Label1.Visible = False
        Label2.Visible = False
        Label3.Visible = False
        Label4.Visible = False
        Label5.Visible = False
        Label6.Visible = False
       
    End Sub

  
    Private Sub LinkLabel2_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel2.LinkClicked
        Label2.Visible = True
        Label3.Visible = True
        Label2.Text = "Para poder buscar información en el sistema ud debe seleccionar algunos de los criterios mostrados en la pantalla,"
        Label3.Text = "o bien usted no utiliza ningun criterio y el sistema le desplegara toda la informacion contenida de dato a buscar. "
    End Sub

    Private Sub LinkLabel3_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel3.LinkClicked
        Label4.Visible = True
        Label5.Visible = True
        Label6.Visible = True
        Label4.Text = "Para poder modificar la información con éxito usted debe tomar en cuenta lo siguiente:"
        Label5.Text = "a) No puede dejar vacio ninguno de los campos solicitados."
        Label6.Text = "b) No puede introducir información en un formato distinto al solicitado en los campos."
    End Sub


    Private Sub ToolStripButton2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click
        Me.Dispose()
    End Sub
End Class